home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / MacMETH 3.2.4 / Examples / In.DEF < prev    next >
Text File  |  1996-06-20  |  330b  |  16 lines
  1. DEFINITION MODULE In;
  2.  
  3.     VAR
  4.         Done: BOOLEAN;
  5.  
  6.     PROCEDURE Char (VAR ch: CHAR);
  7.     PROCEDURE Int (VAR i: INTEGER);
  8.     PROCEDURE LongInt (VAR i: LONGINT);
  9.     PROCEDURE LongReal (VAR y: LONGREAL);
  10.     PROCEDURE Name (VAR nme: ARRAY OF CHAR);
  11.     PROCEDURE Open;
  12.     PROCEDURE Real (VAR x: REAL);
  13.     PROCEDURE String (VAR str: ARRAY OF CHAR);
  14.  
  15. END In.
  16.